drop-above[t] sp drop all kets with coeff > t from the given superposition
drop-above[1.99] (-1 |a> + 0|b> + |c> + 2|d> + 3|e> + 4|f>) - |a> + 0|b> + |c>